Opérations avec les fraction

2/3

cette valeur sera mise à false à chaque nouvel exercice et à true à chaque clic sur valider

le bouton nouvel énoncé passe cette valeur à false et si la réponse est fausse le script du bouton valider passe cette valeur à true

Nouvel énoncé

condition d'affichage des textes ou objets  "solutions"

Juste

Faux

Voir la solution

RAZ (à cacher )

\ovalbox{\text{Dernier exercice de la série}}

Commencer la série d'exercices

\times

 \dfrac{ 7 }{ 4 } 

\dfrac{4}{11}

A =

mettre une expression booléenne qui  sera true si la réponse est  bonne et à false sinon

\frac{2}{3}

\text{Attention, on attend une fraction irréductible.}

\text{Mathématiques à Valin}

\text{Dans cette série d'exercices vous allez calculer des sommes, }\\text{différences, produits ou quotients de nombres rationnels. }\
\text{Les résultats sont attendus sous forme de fractions irréducti-}\\text{bles de nombres entiers.}\
\text{\'Evidemment l'usage de la calculatrice est interdit, et il est}\\text{préférable de s'entraîner à faire les calculs mentalement.}

\text{A} =

rep: 2 / 3
sol = 0.6363636363636364
DemandeTest = false
VoirBoutonSolution = false
VoirSolution = false
grade = 0
numexo = 1
gain = 1
texteScore: "Score : " + grade + " / " + numexo + ""
NoteMax: 10
ExerciceCommence = false
n1 = 7
n2 = 4
d1 = 4
d2 = 11
op = 1
frac1 = SurdText(n1 / d1)
frac2 = SurdText(n2 / d2)
posfrac1 = IndexOf("frac", frac1)
posfrac2 = IndexOf("frac", frac2)
texteEnonce: "\text{Donner la valeur exacte du nombre A défini par :  A}=" + (LaTeX[par0]) + " " + (LaTeX[frac11]) + "" + (LaTeX[top]) + "" + (LaTeX[par3]) + "" + (LaTeX[par1]) + "" + (LaTeX[frac21]) + "" + (LaTeX[par2]) + "" + (LaTeX[par4]) + "\phantom{\dfrac{\dfrac{2}{2}}{\dfrac{2}{2}}}"
tsol = SurdText(sol)
ChampTexte1 = Textfield(trep)
asimplifier: FractionASimplifier[trep, rep] ∧ (trep ≠ "")
ReponseJuste: rep ≟ sol ∧ (¬asimplifier)
texte1: "\text{A}=" + (LaTeX[ttrep]) + "\phantom{\frac{2}{2}}"
nn1: abs(n1) / GCD[{n1, d1}]
dd1: abs(d1) / GCD[{n1, d1}]
sp = If((n1 * n2)  <  0, "-", "")
nn2: abs(n2) / GCD[{n2, d2}]
dd2: abs(d2) / GCD[{n2, d2}]
tdenp = If(dd1 ≟ 1, "" + dd2, If[dd2 ≟ 1, "" + dd1, "" + dd1 + "\times" + dd2])
Tsolp: "\text{Voici la solution détaillée :}\\\text{A}=" + (LaTeX[sp]) + "\frac{" + (LaTeX[nn1]) + "\times" + (LaTeX[nn2]) + "}{" + (LaTeX[tdenp]) + "}=" + (LaTeX[tsol]) + ""
invf2 = SurdText(d2 / n2)
parf21 = If(n2  <  0, "\left(", "")
parf22 = If(n2  <  0, "\right)", "")
tdenq = If(dd1 ≟ 1, "" + nn2, If[nn2 ≟ 1, "" + dd1, "" + dd1 + "\times" + nn2])
Tsolq: "\text{Voici la solution détaillée :}\\
\text{A}=" + (LaTeX[frac1]) + "\times" + (LaTeX[parf21]) + "" + (LaTeX[invf2]) + "" + (LaTeX[parf22]) + "=" + (LaTeX[sp]) + "\frac{" + (LaTeX[nn1]) + "\times" + (LaTeX[dd2]) + "}{" + (LaTeX[tdenq]) + "}=" + (LaTeX[tsol]) + ""
pp = LCM({dd1, dd2})
signfrac1 = If(n1  <  0, "-", "")
kk1: pp / dd1
kk2: pp / dd2
signfrac2 = If(n2 > 0, "+", "-")
pk1: (nn1 * kk1)
pk2: (nn2 * kk2)
numsomme: (abs(n1) / n1 * pk1) + (abs(n2) / n2 * pk2)
signesomme = If(numsomme  <  0, "-", "")
absnumsomme: abs(numsomme)
finsomme = If(pp ≠ Denominator[sol], "=" + tsol, "")
ck1 = If(kk1 ≠ 1, "\times " + kk1, "")
ck2 = If(kk2 ≠ 1, "\times " + kk2)
Tsols: "\text{Voici la solution détaillée :}\\
\text{A}=\frac{" + (LaTeX[signfrac1]) + "" + (LaTeX[nn1]) + "" + (LaTeX[ck1]) + "" + (LaTeX[signfrac2]) + "" + (LaTeX[nn2]) + "" + (LaTeX[ck2]) + "}{" + (LaTeX[pp]) + "}=\frac{" + (LaTeX[signfrac1]) + "" + (LaTeX[pk1]) + "" + (LaTeX[signfrac2]) + "" + (LaTeX[pk2]) + "}{" + (LaTeX[pp]) + "}=" + (LaTeX[signesomme]) + "\frac{" + (LaTeX[absnumsomme]) + "}{" + (LaTeX[pp]) + "}" + (LaTeX[finsomme]) + ""

Tool: FractionASimplifier
Entrées : NombreEnTexte , NombreEnTexte converti en nombre. Retourne un Booléen
Input: NombreEnTexteDonné, aEnNombre
Output: FractionASimplifier

-10/2

aEnNombre: -10 / 2
PosisitionBarreFraction = IndexOf("/", NombreEnTexteDonné)
DenominateurEcrit = Take(NombreEnTexteDonné, PosisitionBarreFraction + 1)
denominateur_a = Denominator(aEnNombre)
DenominateurOu1 = If(Defined[PosisitionBarreFraction], DenominateurEcrit, "1")
DenominateurAprèsSimplification: "" + denominateur_a
FractionASimplifier: (DenominateurAprèsSimplification ≠ DenominateurOu1) ∨ DenominateurEcrit ≟ "1"

Tool: FractionNonSimpliee
FracttionNonSimplifiee[<texte><texte>]
Input: texte1
Output: texte3

-10/6

posmoins = IndexOf("-", texte1)
texte2 = If(posmoins ≟ 1, Take[texte1, 2], texte1)
signe = If(posmoins ≟ 1, "-", "")
Posfrac = IndexOf("/", texte2)
num = If(Defined[Posfrac], Take[texte2, 1, Posfrac - 1], texte2)
den = If(Defined[Posfrac], Take[texte2, Posfrac + 1], "")
TexteEnFrac = If(Defined[Posfrac], "\frac{" + num + "}{" + den + "}", texte2)
texte3: "" + (LaTeX[signe]) + "" + (LaTeX[TexteEnFrac]) + ""